      integer :: MXACJ,MXACIJ,MXAADST
      COMMON/COMJEP/MXACJ,MXACIJ,MXAADST
